home *** CD-ROM | disk | FTP | other *** search
/ Aminet 51 / Aminet 51 (2002)(GTI - Schatztruhe)[!][Oct 2002].iso / Aminet / misc / edu / ejoin.lha / ejoin.c next >
Encoding:
C/C++ Source or Header  |  1997-06-12  |  1.1 KB  |  66 lines
  1. #include <stdio.h>
  2. #include <ctype.h>
  3. #include <string.h>
  4.  
  5. FILE *fpic,*fpif,*fpo,*fopen();
  6. unsigned char s[1025],filnam[100],tag[100],*ptr;
  7. int i,errflag,yk;
  8.  
  9. main(argc,argv)
  10. int argc;
  11. unsigned char **argv;
  12. {
  13.     int argk,c,state,ip;
  14.     long lc;
  15.     register char **p;
  16.     argk = argc;
  17.     if (argk < 3)
  18.     {
  19.           printf("usage: ejoin control_file output_file\n ");
  20.           exit(0);
  21.     }
  22.     p=argv;
  23.     p++;
  24.     fpic= fopen(*p,"r");
  25.     if (fpic == NULL)
  26.     {
  27.         printf("\nCannot open %s\n",*p);
  28.         exit(1);
  29.     }
  30.     p++;
  31.     fpo = fopen(*p,"w");
  32.     if (fpo == NULL)
  33.     {
  34.         printf("\nCannot open %s\n",*p);
  35.         exit(1);
  36.     }
  37.     while (!feof(fpic))
  38.     {
  39.         fgets(s,100,fpic);
  40.         if(feof(fpic))break;
  41.         s[strlen(s)-1] = 0;
  42.         ptr = strtok(s," \t");
  43.         strcpy(filnam,ptr);
  44.         ptr = strtok(NULL," \t");
  45.         if (ptr != NULL) strcpy(tag,ptr);
  46.         fpif = fopen(filnam,"r");
  47.         if (fpic == NULL)
  48.         {
  49.             printf("\nCannot open %s\n",filnam);
  50.             exit(1);
  51.         }
  52.         while (!feof(fpif))
  53.         {
  54.             fgets(s,1024,fpif);
  55.             if(feof(fpif))break;
  56.             s[strlen(s)-1] = 0;
  57.             fprintf(fpo,"%s",s);
  58.             if (ptr !=NULL) fprintf(fpo,"%s/",tag);
  59.             fprintf(fpo,"\n");
  60.         }
  61.         fclose(fpif);
  62.     }
  63.     fclose(fpic);
  64.     fclose(fpo);
  65. }
  66.